home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 March / EnigmA AMIGA RUN 05 (1996)(G.R. Edizioni)(IT)[!][issue 1996-03][Skylink CD IV].iso / earcd / program / ddmoduls.lha / dd_Modules / dd_system / geta4.e next >
Text File  |  1995-02-21  |  175b  |  16 lines
  1. OPT MODULE
  2.  
  3. EXPORT PROC storea4()
  4.   LEA a4storage(PC),A0
  5.   MOVE.L A4,(A0)
  6. ENDPROC
  7.  
  8. EXPORT PROC geta4()
  9.   LEA a4storage(PC),A0
  10.   MOVE.L (A0),A4
  11. ENDPROC
  12.  
  13. a4storage:
  14.   LONG NIL
  15.  
  16.